perm filename INEN[ZZZ,LCS] blob sn#428444 filedate 1979-05-08 generic text, type T, neo UTF8
INS  3; <  INSTRUMENT 3 
ENV
;
ENV P4 P5 B2 DP7 DP8 DP9 P10 ;
COS B2 FP3 B2 P6 ;
OUT B2 B1;END;
SEG 2 0 1 1 8 1 10 .2 25  1 50 0 75 0 100; <F2  ENVELOPE
GEN 0 2 4 .5 0 .3 0 .2 0 .1 7; < CLAR WAVE  F4
SIN 1 1;  <F1  SINE WAVE
 
SRT←12800;
<ENV 0 .14 A*2 1200  F2 F1 .04  P2*2 .04 0;
<ENV .14  .14 C   1200  F2 F1 .04  P2*2 .04 ,-1;
<ENV .28 .14 D*2 1200  F2 F1 .04  P2*2 .04 0;
<ENV .42  .14 G/2 1200  F2 F1 .04  P2*2 .04 ,-1;
ENV 0 .5 D 2000 F2 F1 .08 1 .08 0;
P10=-1;
ENV .5 .5 F;    < P4 to P9 remain the same.
ENV  1 .5 CS 2000 F2 F1 .08 .5 .08 1;
FINI;
<     ENVELOPE GENERATOR   ENV PorB, ForP, B,  P,   P,   P,  P,  P;
<			       AMPL FUNC OUT ATCK STDY DCAY FLAG STOR
< FLAG=1=NO CONTINUATION, REINITS FOR EACH NOTE AND CAN PLAY ON TOP OF SELF.
< FLAG=0=INIT CONTINUATION FOR SEVERAL NOTES UNDER 1 ENV.
< -1=CONTINUATION	(USE DIFFERENT INS. NUMS FOR CHORDS!!)
<ENV 0 .14 A*2 1200  F2 F1 .04  P2 .04 1;FINI;